Delphi Magazine Collection 2001/Delphi Magazine Collection 20001 (2001).iso/DISKS/Issue58/System/MainForm.dfm

Text File | 2000-05-06 | 5.7 KB | 261 lines

object Form1: TForm1
  Left = 314
  Top = 229
  Width = 643
  Height = 488
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 424
    Width = 79
    Height = 13
    Caption = 'Caption Position:'
  end
  object GroupBoxEx1: TGroupBoxEx
    Left = 24
    Top = 24
    Width = 369
    Height = 297
    BiDiMode = bdLeftToRight
    Caption = 'Groovy Groups'
    Color = clBtnFace
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentBiDiMode = False
    ParentColor = False
    ParentFont = False
    TabOrder = 0
    Advanced.CaptionPos = gbLeftTop
    Advanced.CaptionFont.Charset = ANSI_CHARSET
    Advanced.CaptionFont.Color = 8404992
    Advanced.CaptionFont.Height = -19
    Advanced.CaptionFont.Name = 'Arial'
    Advanced.CaptionFont.Style = []
    OnEnableDisableQuery = GroupBoxEx1EnableDisableQuery
    OnPaintCaptionBackground = GroupBoxEx1PaintCaptionBackground
    object DateTimePicker1: TDateTimePicker
      Left = 48
      Top = 32
      Width = 113
      Height = 22
      CalAlignment = dtaLeft
      Date = 36637.9895153704
      Time = 36637.9895153704
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 0
    end
    object Edit1: TEdit
      Left = 48
      Top = 80
      Width = 121
      Height = 22
      TabOrder = 1
      Text = 'Edit1'
    end
    object Memo1: TMemo
      Left = 48
      Top = 168
      Width = 161
      Height = 89
      Lines.Strings = (
        'Memo1')
      TabOrder = 2
    end
    object ListBox1: TListBox
      Left = 208
      Top = 40
      Width = 121
      Height = 97
      ItemHeight = 14
      TabOrder = 3
    end
    object ComboBox1: TComboBox
      Left = 224
      Top = 160
      Width = 89
      Height = 22
      ItemHeight = 14
      TabOrder = 4
      Text = 'ComboBox1'
    end
    object SpinEdit1: TSpinEdit
      Left = 224
      Top = 216
      Width = 97
      Height = 23
      MaxValue = 0
      MinValue = 0
      TabOrder = 5
      Value = 0
    end
    object CheckBox2: TCheckBox
      Left = 56
      Top = 126
      Width = 81
      Height = 17
      Caption = 'CheckBox2'
      TabOrder = 6
    end
  end
  object CheckBox1: TCheckBox
    Left = 16
    Top = 344
    Width = 137
    Height = 17
    Caption = 'Enable Group Box'
    Checked = True
    State = cbChecked
    TabOrder = 1
    OnClick = CheckBox1Click
  end
  object CheckBox3: TCheckBox
    Left = 16
    Top = 368
    Width = 185
    Height = 17
    Caption = 'Add Spaces either side of caption'
    Checked = True
    State = cbChecked
    TabOrder = 2
    OnClick = CheckBox3Click
  end
  object CheckBox4: TCheckBox
    Left = 16
    Top = 392
    Width = 153
    Height = 17
    Caption = 'Show Group Box border'
    Checked = True
    State = cbChecked
    TabOrder = 3
    OnClick = CheckBox4Click
  end
  object CaptionPosCombo: TComboBox
    Left = 104
    Top = 420
    Width = 145
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 4
    OnChange = CaptionPosComboChange
    Items.Strings = (
      'gbTopLeft'
      'gbTopMiddle'
      'gbTopRight'
      'gbBottomLeft'
      'gbBottomMiddle'
      'gbBottomRight'
      'gbLeftTop'
      'gbLeftMiddle'
      'gbLeftBottom'
      'gbRightTop'
      'gbRightMiddle'
      'gbRightBottom')
  end
  object GroupBoxEx2: TGroupBoxEx
    Left = 424
    Top = 176
    Width = 185
    Height = 105
    Enabled = False
    TabOrder = 5
    Advanced.CaptionFont.Charset = ANSI_CHARSET
    Advanced.CaptionFont.Color = clWindowText
    Advanced.CaptionFont.Height = -19
    Advanced.CaptionFont.Name = 'Arial'
    Advanced.CaptionFont.Style = [fsBold]
    object CheckBox5: TCheckBox
      Left = 24
      Top = 32
      Width = 97
      Height = 17
      Caption = 'CheckBox5'
      Enabled = False
      TabOrder = 0
    end
    object CheckBox6: TCheckBox
      Left = 24
      Top = 64
      Width = 97
      Height = 17
      Caption = 'CheckBox6'
      Enabled = False
      TabOrder = 1
    end
    object CheckBox7: TCheckBox
      Left = 24
      Top = 48
      Width = 97
      Height = 17
      Caption = 'CheckBox7'
      Enabled = False
      TabOrder = 2
    end
  end
  object GroupBoxEx3: TGroupBoxEx
    Left = 424
    Top = 56
    Width = 185
    Height = 105
    TabOrder = 6
    Advanced.CaptionFont.Charset = DEFAULT_CHARSET
    Advanced.CaptionFont.Color = clWindowText
    Advanced.CaptionFont.Height = -11
    Advanced.CaptionFont.Name = 'MS Sans Serif'
    Advanced.CaptionFont.Style = []
    object Button1: TButton
      Left = 16
      Top = 24
      Width = 75
      Height = 25
      Caption = 'Button1'
      TabOrder = 0
    end
    object Button2: TButton
      Left = 16
      Top = 56
      Width = 75
      Height = 25
      Caption = 'Button2'
      TabOrder = 1
    end
  end
  object RadioButton1: TRadioButton
    Left = 432
    Top = 54
    Width = 89
    Height = 17
    Caption = 'Choices'
    Checked = True
    TabOrder = 7
    TabStop = True
    OnClick = RadioButton2Click
  end
  object RadioButton2: TRadioButton
    Left = 432
    Top = 179
    Width = 113
    Height = 17
    Caption = 'More Choices'
    TabOrder = 8
    OnClick = RadioButton2Click
  end
end